
package CSS::Preprocessor::Token::VariableReference;

use strict;
use base qw(CSS::Preprocessor::Token);
use fields qw(
    name
);

sub new {
    my ($class, $name) = @_;

    my $self = $class->CSS::Preprocessor::Token::new();
    $self->{name} = $name;

    return $self;
}

sub name {
    return $_[0]->{name};
}

sub as_string_inner {
    return '$'.$_[0]->{name};
}

1;

